home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / XQ Power off on shutdown.xpl < prev    next >
Text File  |  2001-05-14  |  1KB  |  49 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Startup/Shutdown\Shutdown\Windows NT/2K/XP\00) Shutdown Menu"
  5. "NAME"="Windows XP Power off on Shutdown"
  6. "OSVERSION"="000001"
  7. "VERSION"="1.06"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Power off Windows on shutdown."
  10. "DESCRIPTION 1"="This determines if your computer's power turns off once you shut it down or if it waits for you to manually switch off the power. For Windows XP and possibly Windows 2000."
  11. "DESCRIPTION 2"="If your system does not behave as you expect it to, you may need a system BIOS upgrade (usually not a high cost).  Some systems just may not work with this option, and others do."
  12. "AUTHOR"="Xteq Systems (CptSiskoX)"
  13. "CONTACTURL"="http://www.xteq.com"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "COMMENT 1"=" "
  16.  
  17.  
  18. sV1="HKCU\Control Panel\Desktop\PowerOffActive"
  19.  
  20.  
  21. Sub Plugin_Initialize 
  22.  i=RegReadValue(sV1)
  23.  if i=1 then SetUIElement 1,true
  24. End Sub
  25.  
  26. Sub Plugin_CheckData(ElementIndex)
  27. End Sub
  28.  
  29. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  30.  valToSet=0
  31.  
  32.  b=GetUIElement(1)
  33.  if b=true then
  34.     valToSet=1
  35.  else
  36.     valToSet=0
  37.  end if
  38.  
  39.  if GetWinVer=4 or GetWinVer=6 then
  40.     Call RegWriteValue(sv1,valToSet,1)
  41.  end if
  42.  
  43.  
  44.  Call Logoff()
  45. End Sub
  46.  
  47. Sub Plugin_Terminate 
  48. End Sub
  49.